<?php

/*
    [UCenter] (C)2001-2008 Comsenz Inc.
    This is NOT a freeware, use is subject to license terms

    $Id: db.class.php 12126 2008-01-11 09:40:32Z heyond $
*/

function xml_unserialize(&$xml) {
    $xml_parser = new XML();
    $data = $xml_parser->parse($xml);
    $xml_parser->destruct();
    $arr = xml_format_array($data);
    return $arr['root'];
}

function xml_serialize_X(&$data, $htmlon = 0, $level = 1) {
    $space = str_repeat("\t", $level);
    $cdatahead = $htmlon ? '<![CDATA[' : '';
    $cdatafoot = $htmlon ? ']]>' : '';
    $s = '';
    if(!empty($data)) {
        foreach($data as $key=>$val) {
            if(!is_array($val)) {
                $val = "$cdatahead$val$cdatafoot";
                if(is_numeric($key)) {
                    $s .=  "$space<item_$key>$val</item_$key>";
                } elseif($key === '') {
                    $s .= '';
                } else {
                    $s .= "$space<$key>$val</$key>";
                }
            } else {
                if(is_numeric($key)) {
                    $s .=  "$space<item_$key>".xml_serialize_X($val, $htmlon, $level+1)."$space</item_$key>";
                } elseif($key === '') {
                    $s .= '';
                } else {
                    $s .= "$space<$key>".xml_serialize_X($val, $htmlon, $level+1)."$space</$key>";
                }
            }
        }
    }
    $s = preg_replace("/([\x01-\x09\x0b-\x0c\x0e-\x1f])+/", ' ', $s);
    return ($level == 1 ? "<?xml version=\"1.0\" encoding=\"UTF-8\"?><root>" : '').$s.($level == 1 ? '</root>' : '');
}

function xml_format_array($arr, $level = 0) {
    foreach((array)$arr as $key=>$val) {
        if(is_array($val)) {
            $val = xml_format_array($val, $level + 1);
        }
        if(is_string($key) && strpos($key, 'item_') === 0) {
            $arr[intval(substr($key, 5))] = $val;
            unset($arr[$key]);
        } else {
            $arr[$key] = $val;
        }
    }
    return $arr;
}

class XML {
    var $parser;
    var $document;
    var $parent;
    var $stack;
    var $last_opened_tag;

    function XML() {
        $this->parser = xml_parser_create('ISO-8859-1');
        xml_parser_set_option($this->parser, XML_OPTION_CASE_FOLDING, false);
        xml_set_object($this->parser, $this);
        xml_set_element_handler($this->parser, 'open','close');
        xml_set_character_data_handler($this->parser, 'data');
    }

    function destruct() {
        xml_parser_free($this->parser);
    }

    function parse(&$data) {
        $this->document = array();
        $this->stack    = array();
        $this->parent   = &$this->document;
        return xml_parse($this->parser, $data, true) ? $this->document : NULL;
    }

    function open(&$parser, $tag, $attributes) {
        $this->data = '';
        $this->last_opened_tag = $tag;
        if(is_array($this->parent) and array_key_exists($tag,$this->parent)) {
            if(is_array($this->parent[$tag]) and array_key_exists(0,$this->parent[$tag])) {
                $key = count_numeric_items($this->parent[$tag]);
            }else{
                if(array_key_exists($tag.'_attr',$this->parent)) {
                    $arr = array('0_attr'=>&$this->parent[$tag.'_attr'], &$this->parent[$tag]);
                    unset($this->parent[$tag.'_attr']);
                } else {
                    $arr = array(&$this->parent[$tag]);
                }
                $this->parent[$tag] = &$arr;
                $key = 1;
            }
            $this->parent = &$this->parent[$tag];
        } else {
            $key = $tag;
        }
        if($attributes) {
            $this->parent[$key.'_attr'] = $attributes;
        }
        $this->parent  = &$this->parent[$key];
        $this->stack[] = &$this->parent;
    }

    function data(&$parser, $data) {
        if($this->last_opened_tag != NULL)
            $this->data .= $data;
    }

    function close(&$parser, $tag) {
        if($this->last_opened_tag == $tag) {
            $this->parent = $this->data;
            $this->last_opened_tag = NULL;
        }
        array_pop($this->stack);
        if($this->stack) $this->parent = &$this->stack[count($this->stack)-1];
    }
}

function count_numeric_items(&$array) {
    return is_array($array) ? count(array_filter(array_keys($array), 'is_numeric')) : 0;
}

?>